www.gusucode.com > 网域标准通用企业自助建站系统正式版 2009 > 网域标准通用企业自助建站系统正式版 2009.18/网域公司企业网站管理系统ACCESS和SQL正式版/网域公司企业网站管理系统ACCESS正式版/Payment.asp
<!--#include file="Inc/SysProduct.asp" --> <!--#include file="inc/Skin_css.asp"--> <% public ProductList if request("order")="产品更新" then Session("ProductList")="" end if ProductList = Session("ProductList") Sub PutToShopBag(Prodid, ProductList) If Len(ProductList) = 0 Then ProductList = "'" & Trim(Prodid) & "'" ElseIf InStr( ProductList, Prodid ) <= 0 Then ProductList = ProductList&", '"&Trim(Prodid)&"'" End If End Sub %> <% Product_Id = Trim(Request("Product_Id")) if instr(Product_Id,",")>0 then idArr=Split(Product_Id, ",") for i = 0 to ubound(idArr) PutToShopBag idArr(I), ProductList next else PutToShopBag Product_Id, ProductList end if %> <% Session("ProductList") = ProductList '判断购物车是否为空 if Productlist<>"''" then sql="select * from Product where Product_Id in ("&ProductList&") order by Product_Id" Set rs_price = conn.Execute(sql) else response.redirect "error.asp?error=007" response.end end if %> <html> <head> <!--#include file="head.asp" --> <meta http-equiv="Content-Type" content="text/html; charset=gb2312"> <meta name="Author" content="heweiqun"> <meta name="Contact" content="webmaster@wygk.cn"> <meta name="Copyright" content="www.wygk.cn"> <script language="JavaScript"> function CheckUserForm() { if (document.payment.Subject.value.length == 0) { alert("标题不能为空."); document.payment.Subject.focus(); return false; } if (document.payment.Notes.value.length == 0) { alert("说明不能为空."); document.payment.Notes.focus(); return false; } if (document.payment.Receiver.value.length == 0) { alert("联系人不能为空."); document.payment.Receiver.focus(); return false; } if (document.payment.CompanyName.value.length == 0) { alert("公司名不能为空."); document.payment.CompanyName.focus(); return false; } if (document.payment.Email.value.length == 0) { alert("Email不能为空."); document.payment.Email.focus(); return false; } if (document.payment.Email.value.length > 0 && !document.payment.Email.value.match( /^.+@.+$/ ) ) { alert("EMAIL 输入有误."); document.payment.Email.focus(); return false; } if (document.payment.Phone.value.length == 0) { alert("电话不能为空."); document.payment.Phone.focus(); return false; } return true; } </script> </head> <table width="760" border="0" align="center" cellpadding="0" cellspacing="0"> <tr> <td height="5" valign="top" bgcolor="#FFFFFF"></td> </tr> <tr> <td height="72" valign="top" bgcolor="#FFFFFF"><table width="746" border="0" align="center" cellpadding="0" cellspacing="0"> <tr> <td class="tdbg_left" width="190" valign="top" > <table width="100%" border="0" cellspacing="0" cellpadding="0"> <tr> <td height="34" class="title_left"> <img src="Images/smallbook.jpg" width="10" height="10"> 用户登陆 </td> </tr> <tr> <td height="5"></td> </tr> <tr> <td height="10"><table width="92%" border="0" align="center" cellpadding="0" cellspacing="0"> <tr> <td> <% call ShowUserLogin() %> </td> </tr> </table></td> </tr> <tr> <td height="5"></td> </tr> </table> <table width="100%" border="0" cellspacing="0" cellpadding="0"> <tr> <td height="34" class="title_left"> <img src="Images/smallbook.jpg" width="10" height="10"> 产品列表</td> </tr> <tr> <td height="5"></td> </tr> <tr> <td height="10"><table width="92%" border="0" align="center" cellpadding="0" cellspacing="0"> <tr> <td> <% call ShowSmallClass_Tree() %> </td> </tr> </table></td> </tr> <tr> <td height="5"></td> </tr> </table> <table width="100%" border="0" cellspacing="0" cellpadding="0"> <tr> <td height="34" class="title_left"> <img src="Images/smallbook.jpg" width="10" height="10"> 产品搜索</td> </tr> <tr> <td height="5"></td> </tr> <tr> <td height="10"><table width="92%" border="0" align="center" cellpadding="0" cellspacing="0"> <tr> <td> <% call ShowSearch(1) %> </td> </tr> </table></td> </tr> <tr> <td height="5"></td> </tr> </table></td> <td width="6"></td> <td valign="top"><table Class=border width="100%" border="0" cellspacing="0" cellpadding="0"> <tr> <td><table width="100%" border="0" cellspacing="0" cellpadding="0"> <tr> <td class="title_right" height="32"> <img src="Images/smallbook.jpg" width="10" height="10"> 在 线 询 价</td> </tr> </table> <table width="100%" border="0" align="center" cellpadding="0" cellspacing="0"> <tr> <td> <%If Session("UserName")<>"" Then%> <TABLE width="100%" align="center" cellPadding=0 cellSpacing=0> <TBODY> <TR vAlign=top > <TD width="100%"><div align="center"> <center> </center> </div> 会员:<%=Session("UserName")%>: </TD> </TR> <TR vAlign=top > <TD width="100%"> </TD> </TR> </TBODY> </TABLE> <%end if%> </td> </tr> </table> <form action="Payment.asp" method="POST" name="check"> <table width="100%" border="0" align="center" cellpadding="0" cellspacing="1" bgcolor="#000000"> <tr bgcolor="#FFFFFF"> <td colspan="2" height="25"> <font color=B0266D><%=session("UserName")%> </font>您选取的产品明细如下:<br> <font color=B0266D> </font> </td> </tr> <tr bgcolor="#FFFFFF"> <td width="18%" height="25" align="center">选取</td> <td width="82%" height="25" align="center">产品名称</td> </tr> <% While Not rs_price.EOF %> <tr bgcolor="#FFFFFF"> <td width="18%" height="20"><div align="center"> <input type="CheckBox" name="Product_Id" value="<%=rs_price("Product_Id")%>" Checked> </div></td> <td width="82%" bgcolor="#FFFFFF"><div align="center"><font color="B0266D"><%=rs_price("Title")%></font></div></td> </tr> <% rs_price.MoveNext Wend rs_price.close set rs_price=nothing %> <tr bgcolor="#FFFFFF"> <td height="25" align="right"><div align="center"> <input type="submit" name="order" value="产品更新"> </div></td> <td height="25" align="right"><div align="center"> </div></td> </tr> </table> </form> <% sql="select * from [User] where UserName='"&session("UserName")&"'" set rs_price=server.createobject("adodb.recordset") rs_price.open sql,conn,1,1 Sex=rs_price("Sex") Phone=rs_price("Phone") Email=rs_price("Email") CompanyName=rs_price("CompanyName") Receiver=rs_price("Receiver") Add=rs_price("Add") Fax=rs_price("Fax") rs_price.close set rs_price=nothing %> <form name="payment" action="Orderpreview.asp" method="POST" onSubmit="return CheckUserForm();"> <table border="0" cellspacing="1" cellpadding="3" align="center" width="100%" bgcolor="#000000"> <tr> <td width="96" height="23" bgcolor="#FFFFFF"> <div align="right">TO<strong>:</strong></div></td> <td width="439" bgcolor="#FFFFFF"><%=CompanyName%> </td> </tr> <tr> <td height="21" bgcolor="#FFFFFF"> <div align="right"><font color="#FF0000">*</font> 标题:</div></td> <td height="21" bgcolor="#FFFFFF"> <input name="Subject" type="text" size="50" maxlength="100" value=""></td> </tr> <tr> <td height="21" bgcolor="#FFFFFF"> <div align="right"><font color="#FF0000">*</font> 说明:<br> (20-4000字符)</div></td> <td height="21" bgcolor="#FFFFFF"><textarea name="Notes" cols="60" rows="10"></textarea></td> </tr> <tr bgcolor="#FFFFFF"> <td height="21" colspan="2"> <div align="center">谢谢你对我们的产品感兴趣,我们会尽快和你联系!</div></td> </tr> </table> <table border="0" cellspacing="1" cellpadding="3" align="center" width="100%" bgcolor="#000000"> <tr bgcolor="#FFFFFF"> <td width="18%" rowspan="2" bgcolor="#FFFFFF"> <div align="right"><font color="#FF0000">*</font> 联系人<strong>:</strong></div></td> <td width="16%"> <div align="right"> <input name="Sex" type="radio" value="1" <% if Sex="1" then response.Write("checked") end if%>> 先生</div></td> <td width="66%" colspan="2" rowspan="2"> <input name="Receiver" type="text" class="form" id="name" size="30" value=<%=Receiver%>> <b></b></td> </tr> <tr bgcolor="#FFFFFF"> <td> <div align="right"> <input type="radio" name="Sex" value="0" <% if Sex="0" then response.Write("checked") end if%>> 女士</div></td> </tr> <tr bgcolor="#FFFFFF"> <td height="30" bgcolor="#FFFFFF"> <div align="right"><font color="#FF0000">*</font> 公司名称<strong>:</strong></div></td> <td height="30" colspan="3" bgcolor="#FFFFFF"> <input type="text" name="CompanyName" size="40" value=<%=CompanyName%>> (4-100 字符) </td> </tr> <tr bgcolor="#FFFFFF"> <td height="30" bgcolor="#FFFFFF"> <div align="right">地址:</div></td> <td height="30" colspan="3"><input type="text" name="Add" size="50" value=<%=Add%>></td> </tr> <tr bgcolor="#FFFFFF"> <td height="30" bgcolor="#FFFFFF"> <div align="right"><font color="#FF0000">*</font> E-mail<strong>:</strong></div></td> <td height="30" colspan="3"><input type="text" name="Email" size="30" value=<%=Email%>> <b></b></td> </tr> <tr bgcolor="#FFFFFF"> <td height="30" bgcolor="#FFFFFF"> <div align="right"><font color="#FF0000">*</font> 公司电话<strong>:</strong></div></td> <td colspan="3"> <input type="text" name="Phone" class="form" size="20" value=<%=Phone%>> (Format:86-020-34506590)</td> </tr> <tr bgcolor="#FFFFFF"> <td height="30" bgcolor="#FFFFFF"> <div align="right">传真<strong>:</strong></div></td> <td colspan="3"><input type="text" name="Fax" size="20" value=<%=Fax%>> (Format:86-020-34506590)</td> </tr> <tr bgcolor="#FFFFFF"> <td height="32" colspan="4" align="center"> <input type="submit" name="nextstep" value="提交请求"> <input type="button" value="继续购物" language=javascript onClick="javascript:window.close()" name="button"> <input name="reset" type="reset" id="reset" value="重新填写"> </td> </tr> </table> </form></td> </tr> </table> </td> </tr> </table></td> </tr> </table> <!-- #include file="Inc/Foot.asp" --> </BODY></HTML>